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Project  CAI*i£LOT:  Preliminary  Report 
on  a  CAI  System 

Lynn  H.  Brock  eind  Frederick  Vin,  Hombeck 
San  Diego  State  University 


While  some  effort  has  been  expended  on  tiie  other  items  on  this  contract, 
tlte  most  substantial  effort  and  most  3iKnificaj'.t  accomplishiiients  have 
all  involved  contract  item  Ttvls  item  entails  the  design  ai;d  delivery 
of  hardware  and  software  cotp.ponents  of  a  computer  system  to  support 
instructional  activitirs  incorporating  ooe:iputer-^:eneratfid  grapJiic  displays, 
cerntputer-genera'  i  vocali2.ation3,  ar.d  pi'ograr. -selected  slides  from  a  rsmeom 
access  slide  projector.  The  software  also  provides  for  the  collection  of 
data  specified  coursewai'o  authors.  This  report  contains  a  description 
of  the  concepts  and  iacilitiea  incorporated  in  the  coftware  package,  a 
description  of  the  $Ardware  csnfi»-uration,  and  the  ettemai  speeifieationa 
of  the  auUior  language  in  todifi'^'S  notation.  Primary  responsibility 
for  the  design  asid  impleaentatien  of  this  powerful  iait  inexpensive  eomjxiter- 
assisted  instructional  system  has  been  deleiated  to  Kr,  Lynn  Brook. 


Concepts  and  Facilities 


This  project  was  vatdertakc  ^  Initially  to  provide  a  low-cost  p*aphie  display 
system  in  supper t  of  r^srarch  activities  at  tht  Maval  Peraomscl 

Researeh  aM  Oevtl^;^nt  Center,  Sar  Diego  (’aFRiA.),  Supp/ort  of  a  randots* 
aceess  slide  p*'>4««tor  is- a,iso  rec[UiJrt>d  for  this  application.*.  In  the  early 
stages  of  the  process.  It  was  deterttined  that  the  system  could— at 

relatively  little  '.dditioijtl  cost— also  incerporate  rupport  of  a  voice 
syn.theslter.  this  capability  is  expected  to  be  of  etaisidvrable  value  in 
the  plaimed  reaea.th  activiuas  of  thiji  contractor  as  w^li  as^  other#  at 
HPhDC, 

Having  estabii  DiUlL  a#  the  acrniya  for  the  .autiwsr  language  C^afshic 
J^ssiated  J^nstr-ar  vio}?al  ym^a^e)  of  tMs  C^il  the  overall  project 

aetjulred  the  i».ar^  C/s'^Uyf.  A  fully-e^uipred  Ca'SIjoT  student  staUmi 
eonaiata  of  w  g^''f!hic  display  teminal,  rasiidora-accea#  slid.e  projector,  and 
a  voice  aynthtsi’^er.  Progra«>  authors  can  select  any  of  tJ’ese  devices  for 
the  presentation  f  informaUvij  'o  ine  stu^icnt  (subject}.  Students  cah 
eamuiicaie  to  prograai  dtrou^a  trmiml  keyboard  (full  itSCIl  upper 
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and  lower  case  character  set)  and  through  the  positioning  of  the • crosshair 
cursor  on  the  t.raphic  display  screen, 

PrograiES  written  in  GRAIL  are  corrspiled  and  supported  during  execution  by 
software  developed  in  IH-I  ^0  Assembly  language.  CA^iiL0T  will  be  quite 
portable— sub, ^eoL  to  easy  conversion  to  any  operating  system  which  runs  on 
the  IBft  360-p70  series  of  computers.  Some  of  the  noteworthy  features  of 
these  two  CAKh^LOT  subsystems  are  listed  below. 


GRAIL:  Graphic  Aspl5->-ed  Instructional  Language 

GRAIL  is  the  'author  language*  in  the  CAMELOT  system  and  provides  the 
featULi'ea* 


(t)  Display  of  alpluanumeric  and/or  graphic  information.  Upper  and 
loiwer  case  alphanumerics  nay  be  nixed  (along  with  grapMc 
infortaation)  in  tlie  sane  display. 

(2)  Selection  and  display  of  any  one  of  eighty  slides  located  in  the 
Raiidocs  Access  Slide  Pr*ojector, 


(3)  VocaMzatidn  of  phcneoical ly  encoded  messages.  Messages  may 

consist  3f  phonemes,  words  (from  the  dictionary  file),  or  larger 
textual  passages* 

(*^)  Control  of  the  sequence  of  presentation  and  analysis,  boui  on 
logical  condition  testing  ajjd  itjcratively.  Logical  ceiabinations 
(and,  or)  of  relational  (equal  to,  not  equal,  leas  tiian,  etc.) 
expressions,  with  /irouping  (isAiitatcd  via  pajrenthesis)  is  allowed, 

(3)  Input  frois  Ute  terminal  incVad>?a  upper  and  lower  case  al  phanumeric 
as  well  as  t,h«  cui'rent  jsosition  of  the  crosshair  cursor  (upon 
insuMction}  * 

(6)  A  significant  level  of  'c^spile  tiae*  checking  including 

U)  eheeka  for  proper  of  ccnsumcts  (i.e,,  If  one 

ccnstrscfc  i^-Jiat  fee  wiwjliy  cc-ntained  within  another  then  an 
,  ej*rcr  ‘tessa+z'  results  if  the  author  violates  the  reatrietion). 
(b)  checks  for  proper  data  types  (e.g. ,  a  character  sti'ing  variafele 
used  in  an  aritlmetic  expression  is  invalid) » 

Although  the  above  features  are  alasost  always  encountered  in  CAl  author 
languages,  the  followlr<g  are  relatively  unique t 

(?)  S«>entrant  code,  which  allows  several  students  to  be  'taught'  using 
the  saite  ^eachine  instructions,  thereby  saving  storage, 

(S)  Expressions  (character  and  arithmetic)  are  allowed  virtually 
anywhere  a  variable  can  occur, 

i$)  iJxtcnaible  languaije  facility.  The  l^acro  IJefinltion  Iwuiguage  (fSJL) 
la  an  integral  part  of  ii^iAlL  and  allows  addltio:^  opera*  vns  and 
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constructs  to  be  added  to  the  language  by  the  author.  The  MUL 
allows  the  author  to  have  virtually  complete  freedom  in  the 
selection  of  basic  operations  or  strategies  to  be  used  in  teaching 
a  course.  Facilities  in  the  MDL  allow  tiie  author  to  add  new 
commands  to  the  language  and  examine  the  operands  coded  for  each 
use  of  such  operands.  As  a  result  of  examining  those  operands, 
and  additionally  on  the  basis  of  information  retained  from  previous 
users  of  the  same  or  other  conanands,  the  author  has  complete  control 
over  the  resulting  operations,  and  can  repetitively  generate  the 
same  operation  (2),  or  any  sequence  of  operations  as  desired. 

(10)  Dynamic  storage  allocation.  Main  (core)  storage  is  allocated  only 
when  the  structure  requiring  it  is  entered,  thus  reducing  main 
storage  use. 

(11)  Portability.  All  operating  system  dependent  code  is  isolated  into 
one  area,  allowing  easy  conversion  to  any  operating  system  which 
runs  on  tlie  lETl  360-570  series  of  computers. 

(1?)  Generation  of  machine  code.  Actual  'machine  code'  (computer 

instructions)  is  generated  by  GhAIL,  This  ia  typically  5  to  10 
times  faster  in  execution  than  'interpretive'  systems. 


EXGAUBURt  ?bc tract  and  Collect  Logically  Indicated  Basic  User  Records 

EXCALIHUfl  provides  for  the  collection,  maintenance  and  selection  of  au^or 
selected  information  vfith  the  following  features. 

(1)  Author  controlled  recording  at  any  tiiae,  in  audition  to  recording 
student  logon,  logoff  times. 

(2)  Fiiimmi  (as  well  as  PL/l,  COIslL  and  ASii£>U3L2R)  compatible  records, 
allowing  data  analysis  to  be  done  on  any  a\achine  supporting  < 
aagnetlo  tape  and  FititThAN. 

(3)  Saoy  selection  ol'  records  for  fxirther  analysis  through  very  simple  ^ 
Piyi  programs. 


Hardware 


In  our  develotvi^nt  of  facilities,  ve  have  used  established  standards 

(*,g,  ASCII  chaj'acter  code)  and  industry  conventions  (e.g.  RS-252-C  haxxlware 
Interfaces)  whetxtver  iJossibie.  Consequently,  CAKSLOT  can  be  implemented  In  a 
variety  of  eonfigurations  other  thais  that  described  here.  In  particular, 
GP'‘II>-programs  can  be  used  with  ten&inals  otl^er  than  those  we  are  using. 
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Student  Station 

Haixiware  costs  for  graphic  display  capability  have  been  kept  at  low  level 
through  use  of  a  storage- tube  device— the  Tektronix  4012  Computer  Display 
Terminal,  Software  is  being  developed  for  support  of  the  somewhat  more 
expensive  but  extremely  versatile  Tektronix  40l4  Computer  Display  Terminal, 

With  its  enhanced  graphics  option,  the  40l4 

(1)  has  a  display  area  11  inches  high  by  15  inches  wide, 

(2)  has  the  full  ASCII  character  set  (9^  printing  characters), 

(3)  has  four  program-selectable  character  sizes  (from  7^  characters 
per  line  ^vith  39  lines  per  display  to  133  characters  per  line  with 
64  lines  per  display), 

(4)  has  a  vector  drawing  time  of  4000  inches/second, 

(5)  has — in  discrete  plot  node— a  resolution  of  4096  by  4096  addressable 
points, 

(6)  has— in  interactive  mode — 1021  points  horizontally  and  780  points 
vertically  addressable  by  the  thumbwheel  controlled  crosshair  cursor} 
viewing  completely  free  from  parallax, 

(7)  depending  on  option  selected— either  strap  selectable  or  switch 
selectable  inpub/output  data  rates  of  HO,  15O,  300,  6OO,  1200,  2400, 
4800  and  9^^00  bits/seoond, 

(8)  has  limited  vector  refresh  capability  (which  allows  the  temporary 
display  of  u  limited  number  of  vectors— only  one  or  two-et  tht  1200 
band  data  transmission  rate— on  the  othei'wise  permanent  display),  and 

(9)  has  gray  scale  capability. 

Permanent  hard  copies  of  temiiial  displays  eon  be  obtained  by  attaching  a 
Tektronix  46lO  hard  copy  unit  to  the  terminal.  Hard  copy  generation  may  be 
initiated  by  a  switch  on  tlio  terminal  keyboard,  a  switch  on  the  hard  copy  unit, 
or  by  computer  command.  An  optional  multiplexor  allows  a  single  hard  copy  unit 
to  service  up  to  four  terminals. 

Richer  visual  displays  01*0  f>ennittod  through  the  inclusion  of  a  Kodak  ilA-960 
random  access  slide  projector  in  the  student  station  configuration.  Any  of  the 
80  slides  in  tlio  carousel  can  bo  selected  wid  displayed  xmder  program  conti'ol. 
The  projector  can  also  bo  tui'ncd  on  or  off  by  tlw  computer. 

The  presentation  of  eoa)puter-i::enerotod  vocalizations  is  accomplished  through  a 
Federal  i5ert*w  i»orks  Votrax  (Model  5H)  voice  synthesizer.  This  inoxjxfnsive 
device  allows  tljo  programiricr  to  select  tlie  auditory  mode  of  corommioatlon  for 
such  pur, OSes  as  addressing  preliterate  or  blind  students,  conveying  additional 
information  without  disturbing  tV»e  visual  display’,  providing  insumotion  in 
phonics.  Of  ai;..!  ly.  to  provide  enphasii  through  u.;e  of  an  ttUemato  medium.  The 
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VOTRAX  provides  great  flexibility  in  the  presentation  of  vocal  information, 
since  it  has  an  unlimited  vocabulary  of  words,  and  has  none  of  the  mechanical 
timing  pecu]arities  of  cassette  tapes  or  disks* 

A  purchase  order  has  been  placed  with  Sensors,  Data,  Decisions,  Inc,  of  San 
Diego  for  the  design »  fabrication,  and  installation  of  the  Student  Station 
Interface  (SSI).  This  device  will  pass  all  eight-bit  codes  except  those 
specified  for  device  selection.  Device  selection  codes  will  S’witch  the 
computer  output  data  stream  to  the  appropriate  student  station  device.  (Even 
the  device  selection  codes  can  be  passed  through  the  SSI  using  special 
notation, ) 


Computer 

Our  present  system  configuration  is  designed  to  support  a  maximum  of  four 
sir.iultaneous  CAIELOT  users.  We  expect  to  be  able  to  accomplish  this  with 
a  dedicated  area  of  64K  bytes  on  our  IH-I  System  Ji60/h0  computer.  Support 
of  a  larger  number  of  simultaneous  users  would  require  a  larger  dedicated 
area  and/or  the  isiplementation  of  a  timesharing  operating  system,  (V7e  now 
run  under  IHl's  DOS) 

Disk  storage  utilization  will  depend  on  the  amount  of  courseware  to  be 
supported  and  the  number  of  students  to  use  the  system.  Student  records 
will  be  dumped  to  magnetic  tape  on  a  regularly  scheduled  basis—probably 
daily. 


Conmxnicationa 

Because  of  the  small  number  of  to-tmtinals  in  the  present  configuratimt,  it 
has  not  been  necessary  to  resort  to  multiplexing  to  obtain  cost  offectivoness. 
All  communications  will  be  by  voice-grade  lines  on  the  direct  dial  network  at 
1200  bo.ud,  Intei'faoing  at  the  terminal  end  is  via  a  Bell  System  1000A  Data 
Access  Arrangement  and  a  General  DataCeas^)  ;^02-9A  asynchronous  modem.  At  the 
computer  end,  a  Data  General  NOVA  1320  mini  compute.'  (on  the  main  computer’s 
multiplexor  cha  lol)  handles  intra-line  editing  of  tertsinal-gonorr.ted  input 
to  the  computer.  The  phone  line— h'GVA  interface  ia  aceompliahod  vir^  a  Bell 
System  1001A  Data  Aocosn  /irrangoment  mid  a  General  DataCoiua  20?-2A  a-sytiohronous 
modem. 


Harduai'a  Conflruratior>  Reatrcinta 

CAMSilXyi’  ia  suitable  for  instalxation  on  a  wide  variety  of  iiardwai'e  configurations 
but  there  arc  t'wo  constraints  aaide  fro::j  obvious  aize  etmaidcrations  (i.o.  more 
tcrtninals  r«quire  more  core  in  both  the  KuVA  and  the  360).  Firat,  tlio  oystew  ia 
easily  tramii'ortablo  only  to  configurations  in  vdiioh  tlie  main  computer  ia  of  U'.e 
1K*1  3<.)0-37G  scries.  Second,  communications  rates  of  at  least  12G0  baud  are  deairabie 
for  any  significant  use  of  graphics.  Ha  tea  up  to  9600  baud  can  bo  ityilntairied  by 
all  components  of  the  configuration  deacrilxjd  here  except  the  voice  oynthesiaers, 
and  no  iinvs.  higlwM'  rat-'s  couht  he  su;  K’rtvd  by  locating  the 

tcrminalw  in  ito  ircxulty  of  the  co.*j;iiti*''r  to  allow  hard  wiring,  by 
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utilization  of  conditioned  lines  in  the  direct  dial  system,  or  by  use  of 
microwave  or  other  high  speed  communications  equipnent. 


GRAIL  Language  Specifications 


GRAIL  has  been  designed  to  provide  maximum  flexibility  to  the  courseware 
author- programmer.  This  is  an  essential  characteristic  for  a  language 
developed  specifically  for  research  and  development  applications.  At  the 
same  time,  however,  one  can  ac.iieve  the  simplicity  of  other  CAI  author 
languages  (e.g.  PLA^^T  or  PLATO'S  TUTOR)  tJirough  use  of  the  Macro 
Definition  Language  (M)L)  which  has  been  incorporated  in  GRAIL.  The 
presence  of  I-IDL  should  facilit.ate  tlie  simulation  or  emulation  of  other  CAI 
systems  (e.g.  TICCIT)  as  well  as  the  devolo; jice.it  of  innovative  or 
experimental  procedures  or  strategies.  The  external  specifications  for 
GRAIL  instructions  i^ollow.  (In  the  interests  of  economy,  we  have  simply 
copied  a  printout  of  our  online  version  of  the  specifications  rather  than 
have  tiiem  retyped.) 
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NOTATION 

SYNTACTIC  VAR I AD LESS 

ANYTHING  REGHiNlNG  VITH  THE  CHARACTER  IS  REPLACED 

BY  THE  FORM  INDICATED  FOR  THE  VARIABLE 
UNDER  ‘DEFINITIONS*. 

METASYHBOLSl 

THE  CHARACTERS  *  (APOSTROPUE  I#  *<•>  *>•*  AND  •/»  ARE  TO 
BE  TREATED  AS  METASYfiaOLS  UNLESS  THEY  ARE  Ef.T4.0SED  IN 
APOSTROPHES.  THEY  HAVL  THE  FOLLOWiNO  NiavnNGSJ 

<#>  ARE  USED  TO  INDICATE  TKAV  THE  ILNCLOSED  FORM  IS  OPTIONAL 
AND  HAY  BE  OMITTED  AT  THE  USER’S  DISCHETI ON. 

/  INDICATES  THAT  A  CHOICE  MUST  BS  HADE  AMONG  THE  ALTERNATIVE 
FORMS  VHICK  IT  SEPARATES  I  IF  A  DEAULT  IS  ALLOVRD,  It  PRICESDS 
THE  FIRST  UNLESS  01 HE/TVIAE  INDICATED  BY  THE  TEHt, 

THE  FORM  INDICATES  THAT  THE  PRECKmUTG 

FORM  KAY  HE  REPEATED  A  NUMUER  OF  TIMES  tAS  SPEC  If! ED 
IN  THE  TEXT!  VITH  EACH  FOHH  SEPARATED  BY  CO»HMAS. 


THE  FOn.M  **♦.*  INDICA.;  S  THAT  THE  PnKCr.LOI?N‘S 
SYNTACTIC  VaRIAUU:  KAY^  BE  RLPEAtED  A  NUMB£R  OF  TIKES. 

PAnriTHESIS  •(*  ANM>  •)*  ALVA  VS  INDICATE  THAT  ACTUAL 
PARENTHESES  OCCUR.  #TN»  iN  THE  FORM  <<>  FORM  «)>.  EITHER  , 
BOTH  PARENTHESES  KUST  BF  PRESENT  OR  DOTH  OMITTED. 


AS^OSinOPHES  INDICATE  THAT  THE  ENCLOSED  C-HAPRCrER 
OR  CHARACTEnS  ARE  TO  »E  TREATED  AS  THEHSeL\/i:S  AND 
WOT  AS  HETASYKUULSI  THUS#  THE  FORM  INDICATES 
AV  A^-TU'*,  APor.TRr^'Ur  »  *  A'M>  */* 
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LAMG'IAGE  SP'iCIFICATIONS 


•LABEL  FRAME 

STORAGE  IS  ALLOCATED  FOR  VARIABLES  DEFINED  IN  THE 
FRAI-IE  AND  SFRAME  IS  SET  TO  6 LABEL. 

FEND  •MLABEL</E;iASE=yES  /  NO> 

ENDF  DEFINES  THE  END  OF  A  FRAME  .  CAUSING  STORAGE 
DEFINED  FOR  THE  FRAF3E  TO  BE  RELEASED.  IF  THE 
ERASE«NO  OPTION  IS  SPECFIED  THEN  THE  SCREEN  IS  NOT 
ERASED  ,  OTHERWISE  IT  IS  ERASED. 


•OLABEL  text  ( < 'fTEXT-STRING *  /  fiCEXP  >>, . . >,<POSITa(<§LINENO><.@POS>) 
»  > 

</CRLF»YeS  /  NO> 

CAUSES  THE  IK"  ’ GATED  STRINGS  OF  CHARACTERS  TO  BE 
DI,SPL/-VED.  IF  .EITHER  0L1NENO  OR  ePOS  IS  SPECIFIED  THE 
STRING  WILL  BE  DISPLAYED  AT  THE  CURRENT  ALPHA-CURSOR 
POSITION. 

IF  THE  POSIT  PARAMETER  IS  SPECIFIED  >  @LINENO  INDICATES 
THE  HNS  WHERE  THE  DISPLAY  IS  TO  BEGIN  AND  ©POS 
THE  POSITION  WITHIN  THE  LINE  WHERE  THE  FIRST  CHARACTER 
IS  TO  BE  DISPLAYED.  IF  «L1NEN0  IS  OMITTED  »  THE  CURRENT 
LINE  IS  ASSUMED  AND  IF  ©POS  IS  OMITTEC  IT  IS  ASSUMED  TO 
BE  1. 

REGARDLESS  OF  THE  LINE  PARAMETER  (OR  IN  IT»S 
ABSENCE)  THE  ALPHA-CURSOR  IS  MOVED  TO  THE  FIRST 
CHARACTER  OF  THE  NEXT  LINE  AFTER  THE  CHARACTERS  ARE 
DISPLAYED  #  UNLESS  THE  CRLPaNO  PARAMETER  IS  USED  .  IN 
WHICH  CASE  THE  ALPHA-CUP SOH  WILL  BE  LEFT  AT  THE 
POSITION  IMMEDIATELY  FOLLOWING  THE  LAST  CHARACTER 
DISPLAYED. 

•OLABEL  SHOW  (©FEXP) 

THE  SLIDE  SPECIFIED  BY  fFEXP  IS 

SELECTED  AMD  DISPLAYED  ON  THE  RANDOM  ACCESS  SLIDE 
projector,  if  tFEXP  IS  GREATER  THAN  THE  MAXIMUM 
VALID  SLIDE  NUMBER  FOR  THE  TERMINAL  THEN  THE  COMMAND 
IS  iCNOnSD.  IF  THE  TERMINAL  DOES  NOT  HAVE  A  SLIDE 
PROJECTOR  (AS  INDICATED  BY  THE  EXECUTION  VARIABLE 
SFHASP)  THEN  THE  COMMAND  IS  IGNORED. 

•OLABEL  FCALL  •FORNAME. ( •EXP- I #EXP-2.EXP-3^ . . . > 

THE  FCRTRAN  SUBROUTINE  1  DENT I FED  BY  WFORNAME  IS  CALLED  # 


WITH  THE  ARGUMENTS  SPECIFIED  BY  OEXP- I *0EXP-8. . . 

THE  SUBPOUTINE  CALLED  MUST  BE  IWOWN  TO  THE  SYSTEM  OR 
OR  AN  ERROR  MESSAGE  WILL  RESULT  DURING  COMPILATION 
IT  IS  THE  USER'S  RESPONSIBILITY 
TO  ENSURE  that  THE  TYPES  OF  THE  ARGUMENTS  PASSED 
AGREE  WITH  THE  TYPES  EXPECTED  BY  THE  SUBROUTINE. 


16  ni 


KMr'.C  (-''n'/M 

IHh.  iUCTJON  iDENflKlFD  BY  THE  TIHST  6  CHARACTERS 
or  THE  HEISULT  OF  EVALUATING  &CEXP  IS  EXECUTED  . 
AFTER  WHICH  CONTROL  RETURNS  TO  THE  NEXT  STATEMENT 


IF  THE  RESULT  IS  LESS  THAN  SIX  CHARACTERS  >  THEN 
IT  IS  PADDED  WITH  TRAILING  BLANKS.  THIS  STATEMENT 
MAY  OCCUR  ONLY  IN  A  COURSE  COMPILE  UNIT. 


©LABEL  COURSE 

DEFINES  A  COURSE  WITH  THE  INDICATED  NAhJE  # 

CAUSES  STORAGE  TO  BE  ALLOCATED  FOR  VARIABLES  DEFINED  IN 
THE  COURSE  AND  THE  SCREEN  TO  BE  ERASED.  SCOURSE  IS 
SET  TO  ©LABEL  AND  SFRAMEJ  AND  SSECTION  AP.E  SET  TO  NULL 

e 

3ir 

CRSEND  «MLABEL 

DEFINES  THE  END  OF  A  COURSE  AND  CAUSES  ALL  STORAGE 
ALLOCATED  FOR  THE  COURSE  TO  BE  RELEASED. 


©LABEL  IF  <«CON-CLS) 

THEN  <NULL> 

ELSE  <NULL> 

I END  8MLABEL 

THESE  *‘OUR  OPERATIONS  ALLOW  FOR  THE  CONDITIONAL 
EXECUTION  OF  SUBSEQUENT  STATEMENTS  AS  FOLLOWS  - 

1.  IF  eCON ‘CLS  IS  TRUE  /  THE  STATEMENTS  BETWEEN  THE 
THEN  AND  ELSE  OPERATIONS  ARE  EXECUTED  #  AFTER  WHICH 
COvNTROL  PASSES  TO  THE  STATEMENT  FOLLOWING  THE  lEND 

2.  IF  ©CON-CLS  IS  FALSE  *  THE  STATEMENTS  BETWEEN  THE 
■  ELSE  AND  lEMD  ARE  EXECUTED  >  AFTER  WHICH  CONTROL 

PASSES  TO  the  STATEMENT  FOLLOWING  THE  lEND 

3.  NO  STATEMENTS  MAY  OCCUR  BETWEEN  THE  IF  AND  THEM 
OPERATIONS. 

4.  IF  THE  'NULL*  OPTION  IS  SPECIFIED  FOR  A  THEN  OR  ELSE 
0PE5IAT1ON  0  AND  IF  CONTROL  IS  PASSED  TO  IT  BY  THE  If 
OPERATION  THE  CONTROL  IMMEDIATELY  PASSES  TO  THE 
statement  following  the  UN^fD. 

5.  IF  CONSTRUC'iS  MAY  BE  <NLSTED*  #  THAT  IS  -  AN  IF 

CONSTRUCT  MAY  oaCUH  THE  THEN  AND  ELSE  *  OR  ELSE 

AND  I  END  .  OPEUATICLNS  OF  ANOTHER  IF  CONSTROCt. 

6.  ALL  FOUR  OPERATIONS  COMPRISING  THE  IF  CONStRUCV  ARE 
REaUIHED  VHLTl  THE  CONSTRUCT  IS  USED. 


©LABEL  DO  WHILE  /  UNTIL# (iCON-CLS) 
<  STATEMENTS  > 

DEND  fMLAUEL 


THESE  TWO  OPERAT! UNS  ALLOW  FOR  THE  REPETITIVE  EXECUTION 
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WHEN  CONTROL  ENTERS  THE  DO  STATEMENT  ,  THE  VALUE  OF 
tCON-CLS  IS  TESTED.  IF  IT  IS  TRUE  (FALSE)  AND  THE 
WHILE  (UNTIL)  FORM  WAS  USED  >  THEN  THE  STATEMENTS 
between  the  do  and  DENO  are  executed  #  AFTER  WHICH 

CONTROL  AGAIN  ENTERS  THE  DO  STATEMENT. 

WHENEVER  CONTROL  ENTERS  THE  DO  STATEMENT  AND 
«CON-CLS  IS  FALSE  (TRUE)  AND  THE  WHILE  (UNTIL)  FORM  WAS 
USED  #  THEN  CONTROL  PASSES  TO  THE  STATEMENT 
FOLLOWING  THE  DEND. 

♦ 

•LABEL  DOING  eFVAR<eFEXP.l^T0#«FEXP-2<,BY^eFEXP-3> 

DODEC 

<  STATEMENTS  > 

DEND  ftMLABEL 

WHEN  CONTROL  ENTERS  THE  DOING  (DODEC)  STATEMENT 
•FEXP-1  iT  EVALUATED  AND  ASSIGNED  TO  ©FVAR; 

•KEXP-8  IS  EVALUATED  AND  SAVED! 

•  FEXP-3  IS  EVALUATED  AND  SAVED  (IF  ©FEXP-vl 
IS  OMITTED  IT  IS  ASSUMEl'  Et^iiUAL  TO  ONE). 

•  FVAR  IS  NOW  CO:-;P»VHKD  TO  epEXP-B  ,  AND  IF  6FVAR  IS 
GREATER  THAN  (LESS  THAN)  §rEXP-2  THEN  CONTROL  PASSES  TO 
THE  statement  FOLLOWING  THE  DEND.  IF  VFVAR  IS  LESS 
THAN  OR  EQUAL  (GREATER  '^HAN  OH  EQUAL)  TO 

•FEXF-2  THEN  THE  STATE;  :NTS 

BETWEEN  THE  DOING  (DODEC)  AND  THE  DEND  STATEMENT  ARE 
EXECUTED.  WHEN  CONTROL  ENfERS  THE  DEND  STATEMENT 
THE  SAVED  EVALUATION  OF  fiFEXP-Q  IS  ADDED  TO 
(SUBTRACTED  FROM)  i?n'AH.  CONTROL  IS  THEN  TRANSFEHEO 
TO  THE  POINT  IN  THE:  DOING  (DODEC)  WHERf.  IFVAR  IS 
COHPARED  TO  •FEXP-8  AND  THE  ABOVE  PROCESS  IS 
REPEATED. 


•LABEL  CASES  •FLIT^.EKECbFIRST  V  ALL> 

CASE  (VCON-CLS*! > 

<  STATEMENTS  > 

CASE  (•CON-CLS-2) 

<  statehents  ► 

CASE 

• 

CASE  (•G0N-CLS-*«FL1T> 

.  .  ^  STAtr.HENTS  > 

CEND  ©{tLABEL 

THE  CASES  CONSTRUCT  ALLOWS  SELECTION  OF  OnCUPS 
OF  STATLt'JLNTS  TO  BE  EXECUTED  BASED  UPON  THE  THE 
LOGICAL  VALUES  OF  CONDITIONAL  CLAUSES*  WKSN  THE 
CASES  STATHHElilT  IS  ENTERED  TMF  ©CON-CLS  OF  EACE 
CASE  statement  in  THE  CONSTRUCT  IS  EVALOtBD  # 
BEGINNING  WitH  THE  FIRST.  IF  THE  eCON-CLS  OF 
ANY  PAHTlCULAn  CASS  StATfeNENt  IS  TRUE  THEN  r.IE 
STATEHENTS  BETWEEN  THAT  CASE  STATEMENT  AND  THE 


r 


U 

U 
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ARE  EXECUTED.  IF  THE  EXEC«ALL  OPTION  IS  SPECIFIED 
THEN  THE  EVALUATION  OF  EACH  OCOM-CLS  CONTINUES! 

IF  THE  EXEC  EXEC=FIRST  OPTION  IS  SPECFIED  THEN 
♦ONLY*  THE  STATEMENTS  BETUEEN  THE  FIRST  CASE 
STATEMENT  WHICH  EVALUATED  TO  TRUE  AND  THE  NEXT 
CASE  OR  CeJvD  STATEMENT  WItL  BE  EXECUTED. 

WITH  E^HER  exec  OPTION  AT  LEAST  ONE  eCON-CLS 
♦MUST*  BE  TRUE  OR  EXECUTION  OF  THE  COURSE  VILi.  ■ 

BE  TERMINATED  WITH  AN  ERROR. 

♦FLIT  IS  USED  TO  SPECIFY  THE  NUMBER  OF  CASE 
STATEMENTS  WITHIN  THE  CURRENT  CASES  CONSTRUCT  AND 
MUST  BE  exactly  EQUAL  TO  THE  NUJ^BER  OF  CASE 
STATEMENTS. 


♦LABEL  READ  <aCVAR><, POSIT* (<eLINENO><#tPOS>>> 

CAUSES  CHARACTERS  TO  BE  READ  FROM  THE  TERJ1INAL  INTO 
♦  CVAR.  IF  MORE  CHASiACTERS  ARE  ENTERED  THAN  ®CVAB  CAN 
HOLD  *  THEY  ARE  LOST,  IF  @CVAR  IS  OMITTED  THEI«  THE 
EXECUTION  variable  SANS VSR  IS  USED  AND  HAS  A  MAXIMUM 
LENGTH  OF  72.  IF  THE  LINE  OPTION  IS  SPECIFIED  THEN  THE 
ALPHA-CURSOR  IS  MOVED  TO  THE  INDICATED  POSilTlON  ON  THE 
screen  BEFORE  INPUT  IS  ACCEPTED  (SEE  ’TEXT*). 


r 

} 


I 


'M'. 
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♦VAR. (♦EXP) 

♦EXP  IS  EVALUATED  AND  ASSIGNED  TO  ♦VAR,  eEKP  AND  SVAR 
MUST  EE  OF  THE  SAME  TYPE.  IF  A  CHARACTER  STRING 
ASSIGNMENT  IS  PERFORMED  AND  TRUNCATION  OCCURS  THEN 
THE  EXECUTION  VARIABLE  SFTHUNC  WILL  BE  SET 
TO  THE  NUMBER  Of  CHAMCTEilS  TRUNCATED  #  OTHERWISE 
IT  WILL  BE  SET  TO  SERO. 


♦UBBL  REAOGC  <«FVAn-l ><#tFVAR-2><.0CVAR» 

THE  CROSSHAIR  CURSOR  IS  ILLUMINATED  AND  1T»S  X-Y 
COORDINATES  ARE  READ  WHEN  THE  NEXT  CHARACTER  IS  TYPED 
DY  THE  USER,  THE  X  VALUE  .  THE  Y  VALUE  AND  THE 
CHARACTER  TYPED  ARE  READ  INTO  «rVAR-I  >arVAn*»a  AND 
•CVAH  RESPECTIVELY.  IF  ANY  (OR  ALL)  OF  THE  OPERANDS 
ARE  OMITTED  #  THE  VALUES  AHE  READ  INTO  THE  EXECUTION 
VARIABLES  SFCCX  .  iFCCV  AND  ICCHR  RESPEGTIVSLY, 

NOTE  THAT  THE  HAND  Y  VALUES  READ  ARE  IN  SCREEN 
COORDINATES  AND  THAT  THE  RESULTING  LENOtH  Of  tCVAR 
(OR  SCCHH)  WILL  ALVAYYS  BE  ONE. 

•LABEL  RECORD  ^♦CEXP-UeCEXP-2#...#i*TYPE*(»CEXP> 

♦CEXP-t.wCEXP-g,.,,  ARE  CtKNCAtEWATED  AND  WRITTEN 
ON  THE  RECORDER  riLE*  THE  RECORD  IS  IDEfltlflED  8V  THE 
FIRST  TWO  CHARACTERS  or  THE  CHARACTER  STRING  RESULTING 
RESULTING  FROM  EVALUATION  OF  THE  VC EXP  SPECIFIED 
FOR  TYPE*  IT  THE  USEH’S  RESPDJ^SiaiLltV  TO  ENSUiilS 
THAT  THE  RESULT INC  RECORD  HAS  THE  COURECt  FORMAT  FOR 
IT*$  TYPE  *  AND  THAT  THE  TYPE  ITSELF  IS  VALID* 


♦ 

iHUArVl  DELAY 


,  ...  - - -  - 


12 


EXECUTION  or  SUBSEQUENT  OPERATIONS  IS  DELAYED  BY  THE 
SPECIFIED  NUMBER  OF  SECONDS# 

•LAPEL  ESCAPE  tMLABEL 

THIS  COMMAND  ALLOWS  EXTT  jfROM  WITHIN  A  NEST  OF  ’IF* 

#  ‘DO*  #  'DODEC*  #  DOING*  AND/OR  ‘CASES* 

CONSTRUCTS.  VHFN  CONTROL  ENTERS  THE  ESCAPE  STATEMENT 
THE  DEND#IEND  OR  CLND  HAVING  THE  MATCHING  OMLABEL 
WILL  BE  THE  NEXT  STATEMENT  EXECUTED. 

MOTE  THAT  THE  STATEMENT  HAVING  THE  MATCHING  OMLABEL 
♦MUST*  BE  VITHIN  THE  ACTIVE  NEST  AT  THE 
TIME  THE  ESCAPE  STATEMENT  IS  EXECUTED. 


LIMIT  «FLIT 

THE  LIMIT  STATEMENT  IS  USED  TO  SPECIFY  AN  UPPER 
BOUND  ON  HOW  MANY  TIMES  THE  STATEMENTS  WITHIN  A 
•DO*  #  •DODEC*  OH  •DOING*  MAY  BE  EXECUTED. 

IF  NO  LIMIT  STATEMENT  IS  PRESENT  THEN  EACH  SUCH 
CONSTRUCT  IS  LIMITED  TO  100  REPETITIONS.  IF  A  LIMIT 
STATEMENT  IS  PRESENT  #  THEN  THE  NEXT  (AND  ♦ONLY*  THE 
NEXT)  *00*  #  ‘DOING*  OR  * DODEC* 

CONSTRUCT  IN  THE  SOURCE  PROQl  'M  WILL  BE  LIMITED  TO 
•FLIT  REPETITIONS.  6 FLIT  MAY  BE  LESS  THAN  100 
BUT  MUST  BF.  CliEATER  THAN  XERO. 


OOLABEL  /RASE 

THE  SCREEN  IS  ERASED.  IF  THE  TERMINAL  IS  NOT  CAPABLE 
OF  BEING  ERASED  THEN  THE  StATEMENT  HAS  NO  EFFECT* 
VTYPE  CC«L-J#^U-l>*r<tL.2#@U«a)#E<eL-3#eU-G> 

THIS  OPERATION  IS  USED  TO  INDICATE  THAT  ANY  VARIABLE 
OK  FUNCTION  HEFERENCE  IN  SUBSEQUENT  STATEMENTS  WILL 
HAVE  IT*S  TYPE  DEtERMlNED  AS  FOLLOWS* 

IF  THE  FIRST  CHARACTER  CF  THE  VARIABLS  OR  FUNCTION 
IS  IN  THE  RANGE  6L*W#«U-N  THEN  THE  TYPE  IS  ASSUMED 
TO  BE  INDICATED  BY  THE  CHARACTER  PRSCEEDtNC  THE 
PARENTHESIS  IN  (lUtCH  THE  RANGE  WAS  ENCLOSED. 

IF  THE  FIRST  CHARACTER  OF  THE  VARIABLE  OR  FACTION 
DOES  NOT  FALL  IN  ANY  OF  THE  RANGES  #  THEfl  THE  TVPE 
IS  ASSUMED  TO  BE  CHARACT6H* 

AT  THE  tIHE  THE  VTYPE  STATEHENT  IS  ENODtiNTERED  THE 
FOLLOWING  ITEMS  ARE  CHECKED* 

1.  THE  RANGES  HOST  BE  DISJOINT  IE.  THE  RANGES  MUST 
NOT  OVERLAP. 

2.  «L*N  MUST  BE  IXSS  THlVl  OR  EOUAL  TO  iU-N  FOR 
EACH  RANGE 

3*  ONLY  (KIE  VTYPE  STAtCMm  IS  ALLOWED  PER  COMPILE 

UNIT  #  AND  It  MUST  iP^iDlATELY  FOLLOW 

THE  COURSE  OR  SECTION  STATEHEJIT  FOR  THE  COMPILE  UNIT 

VBEF  tVAR»U#»MAXLt;N>#$rVAR-2«FFKAXLEN>... 

#VAR*l#mR“E...  ARE  DEriNED  AND  RESERVED  STORAGE 
BY  THEIR  APPEARANCE  IN  THE  VDLF  STATI^ENT.  THE 
TYPE  (C>f  OR  g)  OF  EACH  VARIABLE  1$  DETEmitNED 


SY  THE  FIRST  CHARACTER  OF  IT *5  NAME  IN 
CONJUNCTION  WITH  THE  VTYPE  STATEMENT  CURRENTLY  IN 
FORCE*  IF  THE  LEVEL^COURSE  OPTION  IS  USED 
THEN  THE  STORAGE  IS  MERELY  DESCRIBED  AND  NO  STOITAGE 
IS  RESERVED  ,  SINCE  THL  STORAGE  WILL  BE  ALLOCATED 
BY  THE  COURSE  WHICH  EXECUTES  THE  SECTION. 

IF  THE  LEVEL=SECT10N  OPTION  IS  USED  >  THEN  THE 
storage  is  DEFINED  FOR  ALL  FRAMES  IN  THE  CURRENT 
SECTION. 

IF  THE  LEVEL  OPTION  IS  NOT  USED  THEM  THE  VARI ARLES 
ARE  DEFINED  <AND  KAY  UE  USED>  ONLY  At  THE  CURRENT 
LEVEL. 

A  NAME  MAY  APPEAR  IN  ONLY  ONE  VOEF  OK  CDEF 
SfATEMENT  WITHIN  THE  COMPILE  UNIT* 

CDEF  fVAR-l<^LIT)#«VAR-fi(«LIT>*.. 

tVAR-U$VAR-a,.*.ARE  DEFINED  /  RESERVED  STORAGE  AND 
SET  TO  THE  VALUE  INDICATED  BY  THE  ASSOCIATED 
•  LIT.  QUANTITIES  DEFINED  IN  THi*^  WAY  MUST  NOT  HAVE 
THEIR  VALUE  CHANGED  DUHIMG  EXECUTION*.  MORE  EFFICIENT 
EXECUTION  VILL  RESULT  IF  THE  NUMBER  OF  CDEF 
STATEMENTS  IS  KEPT  TO  A  MINIMUM. 

ALL  OTKEH  KULES  URICK  APPLY  TO  VARIABLES  DEFINED 
BY  THE  VDEF  StAtSMENT  APPLY  TO  THE  C:.*BF 
statement  ,  WITH  THE  EXCEPTION  TJJaT  THE  LENGTH 

OF  character  variables  is  determined  by  the 

LENGTH  Of  THE  ASSOCIATED  tUT* 


I  TO  6  CMARACtER  VARIABLE 

CONTAINS  THE  NAH£  OF  THE  CUmiENt  FRAME  DURI MG  EXECUTION 

AT  THE  COUnSf  LEVEL  4.  IT  COfaTAIfIS  THE  NAME  Of  TH£  MOST 
RECENTLY  EXECUTED  FHAHl* 
frtlNE-  INTEGER 

GIVES  THE  CimHENT  LIN?  Of  THE  AtPHA»CUiRSOR 

$FP&s*  inrzotn  cs 

GIVES  THE  CUtlM'ENT  POSlTlOfl  #■  WITHIN  THE  LINE  ^  OF  tM'lt 
AtP,‘jA-GU?^SOR* 

SCOrtTE*  6  CHARACtEft  VARIAHLE 

CONTAINS  THt  CUSlft.ENT  MTE  IN  THE  FOPvK  I^N/ODXYY. 

-6COOV*  0  to  0  cHAnACTcn  vatua^le  containing  ms  cuiutent  ■ 

■DAY  OF  THE  WEEK  t E# •MONDAY^ TUESDAY* ♦* * 

ICfOITM**  3  to  0  CMAIiACVEH  VmiABL£  CONTAINING  THE  CURJIEUT 
MONTH  tC*  JAMUAHY/HAV***. 

0  TO  AO  CKARACTFH  VARIABLE 
.  CONTAINS  THE  FIRST  Of  THE  SWmUt  CUHIilliNTLY 

RUNNING « 

fCLNAH*  TO  AO  CMAISACTPH  VARIABLE 

CONTAINS  THE  LAST  f.*AH£  OF  THE  STUDENT  CURRENTLY  'ftUMNIMi* 


SFtOUUM 

CL 


i  t  il  i 


L- J-J'lR.-'.a  L* 


I L'p  'U'inpvT  cuftm'L’tLY runn i mu 


$C0URSI>  5  TO  C  Cf?ARAGTER  VAHlAULn 

CONTAINS  T.ISE  N»L^3E  Of  THE  COUHSE  CUMENTLY  HUNKiNG* 
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•  CON-CLS  1=  eREXP  /  <C>  tREXP:»LOP»*REXP  <» 
EQ  /  NE  /  GT  /  LT  /  GE  /  LE  /  NL  / 

OR  /  AMD 


•HOP 

tLOP 

•AEXP 

•  FEXP 

tEEXP 

•AOP 

eCEXP 

tCOP 

#KKEF 

CVAR 

«CVAR 


Ja 
la 
|e 
}  a 
t  a 
ts 
|a 
?a 
1  a 


N6 


< 


AFEXP 

6FUAR 

dEVAR 

♦  /  - 

eCVAR 


/  CEEXP 

/  OFREF  /  §FLIT 
/  «FREF  /  »ELIT 
f  *  /  V/*  <// 
/  eCLlT  /  tFREF 


/  <(>  •FEXFaAOP©FEXP  <)>  > 
/  <(>  0EEXP©ACP3EEXP  <)>  j 
IS  THE  REMAINDER  OPERATOR) 
/  eCEXP©COP#CEXP  ) 


CFNAME  C  eEXPj,©EXP^..,  > 

OCVAR  /  epVAR  /  «FVAR 

»  erVAR  ,  ©EVAR  ja  j  to  6  ALPHANUMEltlC  CHARArTFH'^ 

*LiT  .i"Lr{?^3  AiiSiic?  ' 

wi.iT  I  a  ©FLIT  /  ©E?,IT  /  eCLlT 
tCLIT  *a  • • ‘eSTRlNG*  •  • 

^FLIT  la  eseUFLIT 

#^JFLIT  ?a  ©Dt;>UKLIT 

^fevIT  ia  ©FHTE?P<©UFI.IT><E©fHT> 

@5  4»  ♦•  /  ♦  /  , 

5/6 


#1>  t«  0  /  1  /  £  /  3  /  A  , 

ep  sa 

tSTrav%»Q  fc  /  esTRiNo$c 
«c  IM  A  /  8/  C/.,./S/ 
©AOP  /  ©COP  /  •>*  / 
#/</)/</>/ 


/  7  /  8  /  9 


#0  / 
»»t  / 

ep  / 


«/)/$/ 


I  /  ■ 


^LAf/EU  I  a  ©A  /  / 


♦tEXT^fSTRlNG  t»  ©STRING 

Ci^f^TAlN  CSJARACTEHS  ViitU  CAUSE  THE  EFFPi*T^  MftTS'rt 

MtOU  IF  PI.ESEliT  l5  ©ImSi 

i  -  AT  SIGN 

ilv  ri!'*T  "^TTgR  JHKSOIATKW 

fvo  ai'sib''.  **  mss'LaVKD  as  umn  case. 

lysJOlCATES  THAT  ALL  L£tT£H$  R£TUFig?{  THE  ©*5 

^OERSConl^’  *  UlSPtAVEO  AS  UPPE.R  CASE. 

iMOlCATtS  that  THl^.  TEXT  RSTUFEl!l  It  AMD  tMF 
IWBEASCORB  IS  TO  US  UMOESniK  ’ 


..■vVa  .fcltus-iMN 


1!> 


PHONETIC  INPUT  DATA  FORMAT 

PHONEME?  ARE  IDENTIFIED  BY  THE  OPE  TO  THREE  CHARACTER  CODE  USED 
IN  THE  VOTRAX  LITERATURE,  AND  ARE  SEPARATED  F'-OM  THE  INFLECTION 
BY  ONE  OR  MORE  C0MM*4»S  OR  Bl-ANKS.  THE  INFLECTION  IS  INDICATED 
BY  A  SINGLE  DIGIT  -  I  FOR  INI,  2  FOR  IN2,  3  FOR  IN3,  AND  4  FOR 
IN4.  AN  OMITTED  INFLECTION  IS  ASSUMED  TO  BE  2. 

example: 

S,  Ir  AHl,  lY..  T,  3,  R,  Uli3,  4,  AHl,  N#  3,  IF  1,  K, 

I  #  S,  I 

IS  ENCODED  AS  HEX 


X»9F.DL*C9*2A^:B«63,D5.CD.8S*99*9F* 
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ERROR  MESSAGES 


STYPOOOl  •  LITERAL  OR  VARIABLE  NOT  KNOWN 

STYP0002  •  INVALID  FIXED  POINT  LITERAL 

STYPOuOS  -  FIXED  POINT  LITERAL  TO  LARGE 

STYPOOOA  -  INVALID  VARIABLE 

STYPO^^OS  -  INVALID  FLOATING  POINT  LITERAL 

STYrOOOG  -  FLOATING  POINT  LITERAL  TO  LARGE 

STYPCOO?  -  EXPONENT  LITERAL  ERROR 

INTPODCI  «  NAME  NOT  TYPED  PER  VTYPE  STATEMENT 

SQOTOOOl  -  IMPROPER  USE  OF  QUOTATION  MARKS 

SPRN0001  •  IMPROPER  USE  OF  PARENTHESES 

CDEFOOOI  -  null  SUBSTRING 

CDEFOOOa  -  INVALID  QUOTMAHK  IN  NAME  FIELD 

CDEF0003  -  NO  VARIABLE  OR  IMPROPER  VARIABLE  FIELD 

CDEF0004  -  LABEL  VS.  VARIABLE  TYPE  ERROR 

CDEFCOOS  -  NAME  TYPE  UnMuNOUN  HADE  EQUAL  TO  LITERAL  TYPE 

CPEFOOOG  •  VAUABLE  LENGTH  NOT  GREATER  THAN  0  CHAILACTERS 

COEF0OO7  •  MO  level  PARAMETER  OR  ERROR  IN  LEVEL  PARAMETER 

CDEFOOOQ  -  CDEP  GENERATED  AT  FRAME  DEFAULT  LEVEL 

CDPFOOOO  -  NAt<£  GREATER  THAN  6  CHARACTERS  LONG 

CDEFOOiO  -  CDEF  CEDE  NOT  GENERATED 

VOEFOOCJ  -  NO  LEVEL  PAnAMSTEH  OR  MISSING  LEVEL  PARAMETER 
VDEfOOOa  -  VDSF  GENERATED  AT  FRAiJS  DEFAULT  LEVEL 
VDEFOOU3  •  MULL  SUBSTRING 

VDLFOOO^  -  NAME  GRSATEn  THAN  6  CHARACTERS  LONG 

VDEFOOOS  -  NAME  TYPE  UNKNOWN 

VOEFOOC6  -  KAKLINS  NOT  NUMERIC 

VDEFOOO?  -  INVALID  MAXLlNE  NUMBER 

VDLFOOOC  •  NAME  TYPE  VS,  MAXLINE  LEPOTM  ERROR 

VDEFOOOO  •  CODE  NOT  GENERATED 

VTYPOOOl  -  INVALID  parameter  LENGTH 

ViYPOOOa  -  INVALID  PARAJ^KTEn  FORMAT 

VTYPOOOG  *  DUPLICATE  PA?IAHr.tER 

VTYPOOO<i  •  invalid  C  PARAMETER 

VtYPOOOS  •  INVALID  F  PARAMETER 

VtYPOGOC  -  INVALID  E  PARaHETER 

VTYP0007  -  PARAMETERS  OVERLAP 

VTYPOOOfi  •  VTYPE  NEEDEO  ALLOVtO  THIS  ONE 

VtVPOOOV  •  only  one  correct  VtYPE  STATEMENT  PEH  RUN 


-  fcw’- 
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§  6RAIL  FUNCTIONS 

^li 

I  $EFRMF(«FARu) 

f  THE  INTEGER  CONTAINED  IN  ©FARG  IS  CONVERTED  TO  AN  E-TYPE 

NUMBER*  NOTE  THAT  THE  CONVERSIOtj  IS  EXACT  IF  AND  ONLY  IF 
I  ‘  «FARG  IS  LESS  THAN  < APPROXIMATELY)  S  DECIMAL  DIGITS. 

fc 

$  $FFRME<#EARG) 

THE  FLOATING  POINT  NUMBER  CONTAINED  IN  ©EARG  IS  CONVERTED 
I  TO  AN  INTEGER.  THIS  CONVERSION  IS  ACCOMPLISHED 

H  BY  IGNORING  AiJY  FRACTIONAL  PART.  IF  THE  RESULTING  INTEGER 

f:  .  IS  TO  LARGE  IN  VALUE  (  >  2*=k31-I  OR  <  )  THUN  THE 

f  RESULT  IS  THE  LARGEST  INTEGER  OF  APPROPRIATE  SIGN^  AND 

S  THE  EXECUTION  VARIABLE  SFFRMEI  IS  SET  TO  1.  IF  THE 

$  .  CONVERSION  IS  ACCOMPLISHED  UITHOUT  ERROR  SFFRMEI  IS 

I  SET  TO  ZERO. 

f  $CFRMF<«FARG> 

s:  THE  F-TYPE  number  IDENTIFIED  BY  OFARG  IS  CONVERTED  TO 

i  A  CHARACTER  STRING  CONTAINING  A  DECIMAL  REPRESENTATION  OF 

t  the  number.  the  form  of  the  RESULT  IS  THE  NUMBER# 

!■  preceded  by  a  •-*  IV  negative#  UlTH  LEADING  ZEROEc 

SUI PRESSED.  A  ZERO  VALUE  IS  REPRESENTED  BY  A  SINGLE  ZERO 
WITH  NO  SIGN.  A  'NEGATIVE  ZERO'  IS  NOT  POSSIBLE. 

SFFRKC(eCARG) 

THE  STRING  CONTAINED  IN  iCARG  IS  CONVERTED  TO  AN  F»TYPE 
NUMBER.  tCARG  MAY  CONTAIN  A  STRING  OF  THE  FORMAT 
'B...SO...B... »  VKEHE  THE  B'S  INDICATE  OPTIONAL  SPACES# 

THE  S  INDICATES  AN  OPTIONAL  SIGN  <•»  OH  -)  AND  THE  D  INDICATES 
V  DECIMAL  DIGITS.  IF  THE  VALUE  UKPRESENTED  BY  THE  STRING  IS 

OF  TOO  LAnUE  A  MAUNITUDB  TO  BE  REPRESENTED  BY  AN  F*TYPg 
NUMBER#  THEM  THE  RESULT  IS  THE  LARGEST  NUMHER  OF  APPROPRIATE 
SIGN  AND  SFPRMCI  IS  SET  TO  -I  OR  -2  DEPENDING  ON  yHSTHER 
THE  SIGN  OF  THE  RESULT  IS  POSlTIin-:  OR  NEGATIVE*  RESPECTIVELY* 
IF  THE  STRING  IS  NOT  OF  THE  CORRECT  FORM#  THEN  A 
RESULT  CF  ZERO  IS  RETURNED  AND  THE  EXECUTION  VARIABLE 
;  IFFRHCl  IS  SET  TO  THE  POSITION  OF  THE  CHARACTER  IN 

r  CCARG  VHERE  THE  ERROR  VA£  ngTECTED. 

IF  MO  EHRORS  OCCUR#  %nm0.l  IS  SET  TO  ZERO. 

»crRMS<#EAR6<#erAnQ>> 

IS  CONVERTED  TO  A  G»L?lMACTER  STRING  ACCORDING  TO 
THE  FOLLOVINS  jrJLES- 
IF  tFAHO  IS  NOT  SPECIFIED  TKEN- 

^  ‘  IP  THE  absolute  value  OF  ^EARG  IS  LESS  THAN  OR 

EOUAL  TO  ^999, PW  AND  OHEATER  THAN  OR  ECUAL  TO 
*0001  THEN  THE  RESULTING  CHARACTER  STRING  HAS  THE 

I  FORM  vnmz  the  z*s  indicate  ^lro  suppressed 

f;  positions  {UHICH  ark  not  returned  if  they  contain  spaces)# 


AND  THE  9»S  INDICATE  POSITIONS  VMICH  DILL  RE  ZERO 
FILLED  UNTIL  THE  IJVST  NON-ZEno  DIGIT  IS  LNCOUNtinED. 

IF  THE  NUMBER  IS  NKGMTIVE#  THEN  A  IS  iMSERtKO  PRIOR 
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IF  THE  ABOVE  CONDITION  IS  NOT  MeT  THEN  THE  RESULTING 
STRING  WILL  HAVE  THE  FORM  *ZZZZLZZ .9999999ESXX*  WHERE 
THE  Z’S  AND  9’S  ARE  HANDLED  AS  ABOV",  AS  IS  THE  SIGN^ 

THE  •£»  IS  AM  ACTUAL  CHARACTER  IN  T..L  RESULTING  STRING 
AND  the  IS  the  sign  (+  OR  ->  OF  THE 
EXPONENT  (WHICH  IS  REPRESENTED  BY  THE  'XX*).  THE 
MEANING  OF  THIS  FORM  IS  THAT  THE  NUMBER  PRECEEDING  THE  »£• 

'  SHOULD  BE  MULTIPLIED  BY  TEN  RAISED  TO  THE  XX’TH  POWER  TO 
PROVIDE  THE  CORRECT  VALUE.  THUS  THE  FORM  IS  VERY  SIMILAR 
TO  STANDARD  SCIENTIFIC  NOTATION. 

IF  SFARG  IS  SPECIFIED  THEN  CONVERSION  IS  AS  ABOVE  EXCEPT 
THAT  THE  NUMBER  OF  DIGITS  PRINTED  AFTER  THE  DECIMAL  POINT 
IS  EQUAL  TO  OFARG.  HOWEVER,  IN  NO  CASE  WILL  MORE  THAN  7 
SIGNIFICANT  DIGITS  BE  GENERATED,  SINCE  THIS  IS  THE 
PRECISION  LIMIT  OF  THE  COMPUTER. 

IF  THE  RESULTING  STRING  IS  LONGER  THAN  THE  OUTPUT 
CHARACTER  STRING  INTO  WHICH  IT  IS  BEING  STORED, 

THEN  SEFRMEI  (A  GLOBAL  FULL  WORD  VARIABLE) 

IS  SET  TO  -I. 


SEFRMCteCARG) 

the  character  string  IN  0CARG  IS  CONVERTED  TO  AN  E-TYPE 
NUMBER  ACCORDING  TO  THE  FOLLOWING  RULES  - 

THE  STRING  MUST  HE  OF  THE  FORJI  ‘B.  .  .SD.  .  .PO.  .  .0.  ..ESX.  .  .B.  .  •  ♦ 
WHERE  THE  B’S  INDICATE  OPTIONAL  BLANKS,  .  .. 

THE  FIRST  ‘S’  INDICATES  AN  OPTIONAL  SIGN  < ♦  OR  -), 

THE  D‘S  indicate  DECIMAL  DIGITS  TO  BE  INTERPRETED  AS  THE 
SIGNIFICANT  DIGITS  OF  THE  NUMBER, 

THE  ‘P*  INDICATES  AN  OPTIONAL  DECIMAL  POINT, 

THE  SECOND  'S'  INDICATES  THE  SIGN  OF  THE  EXPONENT  AMD 
1$  OPTIONAL, 

THE  ’E*  INDICATES  THE  LETTER  E#  WHICH  IS  REQUIRED  IF 
AN  EXPONENT  IS  SPECIFIED, 

AMD  THE  X»S  INDICATE  THE  EXPONENT  WHICH  IS  ALSO  OPTIONAL. 

THE  FOLLOWING  ADDITIONAL  RULES  APPLY  - 

1.  IP  SCARG  IS  A  NULL  STRING,  THEN  SEFIUICI  IS  SET  TO  -I. 

2.  IF  THE  STRING  REPRESENTS  A  NUMBER  TOO  LARGE  IN  MAGNITUDE 
TO  BE  STORED  IN  AN  E-TYPE  NUMBER,  THEN  JEFUMCI  IS  SET 

TO  -a  AND  THE  RESULT  IS  SET  EGUAL 

TO  THE  LARGEST  NUMBER  OF  APPROPRIATE  SIGN. 

3*  IF  THE  STRING  REPRCSENTS  A  MUMSER  TOO  SHALL  TO  BE  STORED 
IN  AN  E-TYrE  NUMBER,  THEN  iEpriMCI  IS  SET  TO  -3  AND  THE 
RESULT  IS  THE  SMALLEST  NO^.-lERO  NUFSBEP.  OF  APPROPUIATE 
SIGN. 

4.  IF  ANY  OTHER  FOHHAT  ERROR  IS  ENCOUNTERED,  THEN  SEFRMCI 
IS  SKY  TO  the  POSITION  IN  €CAHG  WHERE  THE  ERROR  WAS 
DISCOVERED  AND  THE  .RESULT  IS  ZERO. 

5.  IF  NO  ERRORS  OCCUR,  THEM  SEFRMCl  IS  SET  TO  ZERO. 


S INSTP ( e FARC ,  GC  ARG-  I  >  TY 
VCARC?“!  is  . 


C 5’V35  ’OvCl'i'; 


•  OF  vcAnc-a, 
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§CARG-3>...  AND  A  VALUE  OF  TRUE  IS  RETUPMED  IF  tCARG-S^ 
fCARG-3>...  ALL  'OCCUR*  IN  OCaRG-I.  OTHERWISE/  A  VALUE  OF 
FALSE  IS  RETURNED.-  ?CAn(i-N  IS  SAID  TO  'OCCUR'  IN  ©CARG- i 
IF  AT  LEAST  ( SFLENt©CARG-N>*6FARG)/100  CKARA.CTERS  OF 
«CAnU-N  OCCUR  CONTIGUOUSLT  ANYWHERE  IN  8CARG-1. 

S*INSTRO(«FARGI  /#CARG-l  /eCARG-2/.  ..  ) 

THIS  FUNCTION  BEHAVES  LIKE  SINSTR  WITH  THE  EXCEPTION 
THAT  ANY  'OCCURANGE'  OF  ©CARG-N  MUST  FOLLOW  THE 
♦OCCURANCE*  OF  aCARG-(N-l>  IN  0CARG-1. 

$CSBSTR<eCEXP/©FEXP-l,SFEXP-2) 

A  STRING  OF  CHAHACTERS  FROM  ^CEXP,  BEGINNING 
WITH  THE  'QFEXP-l'TH  AND  CONTINUING  FOR  0FEKP-2 
CHARCTERS  IS  RETURNED*  IF  ©FEXP- 1 +rjFEXP-2 
EXCEEDS  SFLENCOCEXP)  THEM  ONLY 

those  characters  ACTUALLY  IN  0CEXP  ARE  RETURNED. 

IF  eFEXP  IS  2ER0  OR  NEGATIVE/  OR  OrEXP-2 

IS  NEGATIVE  THEM  THE  EXECUTION  VARIABLE  SFSBSTRI  IS  SET  TO  -I. 

AND  A  NULL  STRING  IS  RETURNED.  IF  ©FEXP-S  IS  ZERO  THEN  A 
NULL  STRING  IS  RETURNED  AMO  SFSBSTRI  IS  SET  TO  ZERO. 

$CNXTWD< 0CEXP- 1  /  @ FEXP< 8 FVAR< /  ©C£XP-2>  >  > 

THE  NEXT  'WORD'  IN  ©CEXP-I  IS  RETURNED.  fiCEXP-I  IS  SCANNED 
BEGINNING  VITH  THE  CHARACTER  AT  POSITION  0FEXP  UNTIL 
THE  FIRST  character  WHICH  IS  ♦NOT*  A  DELIMITER  IS  FOUND. 
SUBSEQUENT  CHAnACTERS  FORM  THE  RESULT  UNTIL  THE  NEXT 
DELIMITER  IS  FOUND/  AT  WHICH  TIME  PFVAR  IS 
SET  <IF  SPrClFIED)  TO  THE  POSITION  IN  eCF.XP-1  OF  THE 
CHARACTER  WHICH  CAUSED  THE  SCAN  TO  END.  IF  THE  END  OF 
•CEXP«l  IS  ENCOUMTEHED  DURING  THE  SCAN/ 

then  the  characters  PRIOR  TO  THE  END  OF  THE  STRING  ARE  RETURNED 

AND  erVAR  IS  SET  TO  ZERO  IF  IT  WAS  SPECIFIED. 

IF  0CEXP-8  IS  SFCCIFIED  THEN  EACH  CKAFiACTER  IN  0CEXP-2 
IS  USED  AS  A  DELItllTEni  OTHERWISE/  THE  FOLLOWING  CHARACTERS 
CONSTITUTE  TliE  'DEFAULT*  DELIMITERS. 

BLAcNHS  .  » 

7  »  H EXCLAMATION  MARK) 

I  *  / 


